home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2004 December
/
2004-12 CHIP.iso
/
Internet
/
The Bat! Professional 3.01
/
thebat_professional.msi
/
Data1.cab
/
thebat.exe
/
0
/
RCDATA
/
TADDRESSSELECTOR
/
TADDRESSSELECTOR.txt
Wrap
Text File
|
2004-10-12
|
15KB
|
608 lines
object AddressSelector: TAddressSelector
Left = 307
Top = 129
Width = 587
Height = 352
ActiveControl = eSearch
BorderIcons = [biSystemMenu, biMaximize]
Caption = 'Pick e-mail addresses'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object pnClient: TPanel
Left = 0
Top = 0
Width = 579
Height = 277
Align = alClient
TabOrder = 0
object pnSeparator: TSplitter
Left = 289
Top = 1
Height = 275
AutoSnap = False
MinSize = 150
end
object pnBook: TPanel
Left = 1
Top = 1
Width = 288
Height = 275
Align = alLeft
BevelOuter = bvNone
Constraints.MinWidth = 100
TabOrder = 0
object pnButtons: TPanel
Left = 254
Top = 32
Width = 34
Height = 243
Align = alRight
BevelOuter = bvNone
TabOrder = 2
object b_Add: TButton
Left = 1
Top = 17
Width = 32
Height = 24
Caption = '>'
TabOrder = 1
OnClick = b_AddClick
end
object b_Del: TButton
Left = 2
Top = 85
Width = 31
Height = 24
Caption = '<'
TabOrder = 2
OnClick = b_DelClick
end
object b_DelAll: TButton
Left = 2
Top = 117
Width = 31
Height = 24
Caption = '<<'
TabOrder = 3
OnClick = b_DelAllClick
end
object b_Del_All: TButton
Left = 2
Top = 149
Width = 31
Height = 24
Caption = '<<<'
TabOrder = 4
OnClick = b_Del_AllClick
end
object b_Menu: TButton
Left = 2
Top = 186
Width = 31
Height = 24
Caption = '?'
TabOrder = 0
OnClick = b_MenuClick
end
object b_AddAll: TButton
Left = 1
Top = 48
Width = 32
Height = 24
Caption = '>>'
TabOrder = 5
OnClick = b_AddAllClick
end
end
object pnTop: TPanel
Left = 0
Top = 0
Width = 288
Height = 32
Align = alTop
BevelOuter = bvNone
TabOrder = 0
OnResize = pnTopResize
object cbBook: TComboBox
Left = 2
Top = 3
Width = 241
Height = 26
Style = csOwnerDrawFixed
ItemHeight = 20
TabOrder = 0
OnChange = cbBookChange
OnDrawItem = cbBookDrawItem
end
end
object pnAddr: TPanel
Left = 0
Top = 32
Width = 254
Height = 243
Align = alClient
BevelOuter = bvNone
BorderWidth = 2
TabOrder = 1
object pnSearch: TPanel
Left = 2
Top = 204
Width = 250
Height = 37
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
OnResize = pnSearchResize
object lSearch: TLabel
Left = 8
Top = 12
Width = 66
Height = 13
Caption = '&Quick search:'
FocusControl = eSearch
end
object eSearch: TEdit
Left = 80
Top = 8
Width = 129
Height = 21
PopupMenu = pmSearch
TabOrder = 0
OnChange = eSearchChange
end
end
object nBook: TNotebook
Left = 2
Top = 2
Width = 250
Height = 202
Align = alClient
TabOrder = 1
object TPage
Left = 0
Top = 0
Caption = 'Default'
object pnAB: TPanel
Left = 0
Top = 0
Width = 250
Height = 202
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object hBook: THeaderControl
Left = 0
Top = 0
Width = 250
Height = 17
Hint = 'nograb'
Sections = <
item
AllowClick = False
ImageIndex = -1
MaxWidth = 20
MinWidth = 20
Width = 20
end
item
ImageIndex = -1
MaxWidth = 0
Text = 'Name'
Width = 0
end>
OnSectionResize = hBookSectionResize
end
object gAddr: TAddressBookGrid
Left = 0
Top = 17
Width = 250
Height = 185
Align = alClient
DefaultRowHeight = 18
DefaultDrawing = False
FixedRows = 0
GridLineWidth = 0
Options = [goThumbTracking]
PopupMenu = GridPopup
TabOrder = 1
OnClick = gAddrClick
OnDblClick = gAddrDblClick
OnKeyDown = gAddrKeyDown
OnKeyPress = gAddrKeyPress
OnMouseDown = gAddrMouseDown
Header = hBook
ReadOnly = True
RowHeights = (
18
18
18
18
18)
end
end
end
object TPage
Left = 0
Top = 0
Caption = 'DBpage'
object pnDB: TPanel
Left = 0
Top = 0
Width = 250
Height = 202
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object dbHeader: THeaderControl
Left = 0
Top = 0
Width = 250
Height = 17
Sections = <
item
ImageIndex = -1
MaxWidth = 24
MinWidth = 24
Width = 24
end
item
ImageIndex = -1
Width = 200
end>
OnSectionResize = dbHeaderSectionResize
end
object dbGrid: TADBGrid
Left = 0
Top = 17
Width = 250
Height = 185
Align = alClient
ColCount = 2
DefaultDrawing = False
FixedCols = 0
FixedRows = 0
GridLineWidth = 0
Options = []
TabOrder = 1
OnMouseDown = dbGridMouseDown
SortBy = 0
Header = dbHeader
end
end
end
end
end
end
object pnLists: TPanel
Left = 292
Top = 1
Width = 286
Height = 275
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object xPages: TPageControl
Left = 0
Top = 0
Width = 286
Height = 234
ActivePage = tsTo
Align = alClient
TabOrder = 0
OnChange = xPagesChange
OnDragDrop = xPagesDragDrop
OnDragOver = xPagesDragOver
object tsTo: TTabSheet
Caption = 'TO'
OnDragOver = xPagesDragOver
object l_To: TListBox
Left = 0
Top = 0
Width = 278
Height = 206
Align = alClient
DragMode = dmAutomatic
ItemHeight = 13
MultiSelect = True
Sorted = True
TabOrder = 0
OnDragDrop = l_ToDragDrop
OnDragOver = l_ToDragOver
OnKeyDown = l_BCCKeyDown
end
end
object tsCC: TTabSheet
Tag = 1
Caption = 'CC'
OnDragOver = xPagesDragOver
object l_CC: TListBox
Left = 0
Top = 0
Width = 274
Height = 206
Align = alClient
DragMode = dmAutomatic
ItemHeight = 13
MultiSelect = True
Sorted = True
TabOrder = 0
OnDragDrop = l_ToDragDrop
OnDragOver = l_ToDragOver
OnKeyDown = l_BCCKeyDown
end
end
object tsBCC: TTabSheet
Caption = 'BCC'
OnDragOver = xPagesDragOver
object l_BCC: TListBox
Left = 0
Top = 0
Width = 274
Height = 206
Align = alClient
DragMode = dmAutomatic
ItemHeight = 13
MultiSelect = True
Sorted = True
TabOrder = 0
OnDragDrop = l_ToDragDrop
OnDragOver = l_ToDragOver
OnKeyDown = l_BCCKeyDown
end
end
end
object pnAdd: TPanel
Left = 0
Top = 234
Width = 286
Height = 41
Align = alBottom
BevelOuter = bvNone
Constraints.MinWidth = 150
TabOrder = 1
OnResize = pnAddResize
object eAdd: TEdit
Left = 8
Top = 10
Width = 185
Height = 21
TabOrder = 0
OnChange = eAddEnter
OnEnter = eAddEnter
OnExit = eAddEnter
end
object bAddToList: TButton
Left = 200
Top = 8
Width = 81
Height = 25
Caption = 'Add'
Enabled = False
TabOrder = 1
OnClick = bAddToListClick
end
end
end
end
object pnBottom: TPanel
Left = 0
Top = 277
Width = 579
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object cbAddAll: TCheckBox
Left = 7
Top = 13
Width = 306
Height = 17
Caption = '&Add secondary addresses to BCC'
TabOrder = 0
end
object pnBottomBtn: TPanel
Left = 399
Top = 0
Width = 180
Height = 41
Align = alRight
BevelOuter = bvNone
TabOrder = 1
object bOK: TButton
Left = 3
Top = 7
Width = 76
Height = 25
Caption = '&OK'
Default = True
ModalResult = 1
TabOrder = 0
OnClick = bOKClick
end
object bCancel: TButton
Left = 88
Top = 7
Width = 75
Height = 25
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 1
end
end
end
object pmSearch: TPopupMenu
Left = 116
Top = 193
object msFilter: TMenuItem
Caption = '&Filter'
Default = True
ShortCut = 13
OnClick = msFilterClick
end
object msFilterColumn: TMenuItem
Caption = 'Filter &Column'
ShortCut = 8205
OnClick = msFilterColumnClick
end
object msFindNext: TMenuItem
Caption = 'Find &Next'
ShortCut = 16397
OnClick = msFindNextClick
end
object msFindPrev: TMenuItem
Tag = 1
Caption = 'Find &Previous'
ShortCut = 24589
OnClick = msFindNextClick
end
object N11: TMenuItem
Caption = '-'
end
object msUndo: TMenuItem
Caption = '&Undo'
OnClick = msUndoClick
end
object N13: TMenuItem
Caption = '-'
end
object msCut: TMenuItem
Caption = 'C&ut'
ShortCut = 16472
OnClick = msCutClick
end
object msCopy: TMenuItem
Caption = 'C&opy'
ShortCut = 16451
OnClick = msCopyClick
end
object msPaste: TMenuItem
Caption = '&Paste'
ShortCut = 16470
OnClick = msPasteClick
end
object N12: TMenuItem
Caption = '-'
end
object msSelectAll: TMenuItem
Caption = 'Select all'
ShortCut = 16449
OnClick = msSelectAllClick
end
object qsAdd: TMenuItem
Caption = 'Add'
ShortCut = 32817
Visible = False
OnClick = b_AddClick
end
object qsAddAll: TMenuItem
Caption = 'Add All'
ShortCut = 32818
Visible = False
end
object qsRemove: TMenuItem
Caption = 'Remove'
ShortCut = 32819
Visible = False
OnClick = b_DelClick
end
object qsRemoveAll: TMenuItem
Caption = 'Remove All'
ShortCut = 32820
Visible = False
OnClick = b_DelAllClick
end
object qsRemoveTOCCBCC: TMenuItem
Caption = 'Remove TO/CC/BCC'
ShortCut = 32821
Visible = False
OnClick = b_Del_AllClick
end
end
object LDAP1: TLDAPClient
AutoBind = True
SearchDerefAliases = ldaNever
SearchScope = lssWholeSubtree
SearchSizeLimit = 0
SearchTimeLimit = 0
Port = 389
Authentication = laNone
OnConnectFail = LDAP1ConnectFail
OnBind = LDAP1Bind
OnBindFail = LDAP1BindFail
OnFound = LDAP1Found
OnSearchDone = LDAP1SearchDone
Left = 177
Top = 113
end
object tmSearch: TTimer
Enabled = False
Interval = 200
OnTimer = tmSearchTimer
Left = 57
Top = 105
end
object tmLdapSearch: TTimer
Enabled = False
Interval = 2000
OnTimer = tmLdapSearchTimer
Left = 113
Top = 137
end
object GridPopup: TPopupMenu
OnPopup = GridPopupPopup
Left = 73
Top = 193
object mgAdd: TMenuItem
Caption = 'Add'
ShortCut = 32817
OnClick = b_AddClick
end
object mMsgTo: TMenuItem
Caption = 'Add address'
Visible = False
end
object mgAddAll: TMenuItem
Caption = 'Add All'
ShortCut = 32818
OnClick = b_AddAllClick
end
object mgRemove: TMenuItem
Caption = 'Remove'
ShortCut = 32819
OnClick = b_DelClick
end
object mgRemoveAll: TMenuItem
Caption = 'Remove All'
ShortCut = 32820
OnClick = b_DelAllClick
end
object mgRemoveTOCCBCC: TMenuItem
Caption = 'Remove TO/CC/BCC'
ShortCut = 32821
OnClick = b_Del_AllClick
end
object N1: TMenuItem
Caption = '-'
end
object mgSelectAll: TMenuItem
Caption = 'Select All'
ShortCut = 16449
OnClick = mgSelectAllClick
end
end
end
